6 IFSA=1THENSA=2:GOTO100
10 POKE53280,0:POKE53281,0:POKE53265,11:POKE808,225:POKE775,200
70 POKE43,1:POKE44,16:POKE4096,0
80 POKE53272,PEEK(53272)AND240OR2
90 SA=1:LOAD"IRRPART 1 BY ODY",8,1
100 PRINT"[147]LOAD";CHR$(34);"IRRPART 2 BY ODY";CHR$(34);",8"
110 PRINT"RUN"
120 POKE198,3:POKE631,19:POKE632,13:POKE633,13:NEW